home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Astromacronomer ••• / BASIC Runtime / BASIC Runtime.rsrc / CODE_13.txt < prev    next >
Text File  |  1986-09-30  |  21KB  |  381 lines
  1. # near model CODE resource
  2. # jump table entries: 3520-3521 (2 of them)
  3. export_440:
  4. 00000000  526D FE22                addq.w     [A5 - 0x1DE], 1
  5. 00000004  0C40 F9F6                cmpi.w     D0, 0xF9F6
  6. 00000008  660A                     bne        +0xC /* 00000014 */
  7. 0000000A  4EAD 0452                jsr        [A5 + 0x452 /* export_134 */]
  8. 0000000E  6100 00FA                bsr        +0xFC /* 0000010A */
  9. 00000012  6066                     bra        +0x68 /* 0000007A */
  10. label00000014:
  11. 00000014  0C40 F8A9                cmpi.w     D0, 0xF8A9
  12. 00000018  660A                     bne        +0xC /* 00000024 */
  13. 0000001A  4EAD 0452                jsr        [A5 + 0x452 /* export_134 */]
  14. 0000001E  6100 0108                bsr        +0x10A /* 00000128 */
  15. 00000022  6056                     bra        +0x58 /* 0000007A */
  16. label00000024:
  17. 00000024  4EAD 0472                jsr        [A5 + 0x472 /* export_138 */]
  18. 00000028  4EAD 011A                jsr        [A5 + 0x11A /* export_31 */]
  19. 0000002C  2C2D ECA6                move.l     D6, [A5 - 0x135A]
  20. 00000030  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  21. 00000034  4EAD 0472                jsr        [A5 + 0x472 /* export_138 */]
  22. 00000038  4EAD 011A                jsr        [A5 + 0x11A /* export_31 */]
  23. 0000003C  2A2D ECA6                move.l     D5, [A5 - 0x135A]
  24. 00000040  787F                     moveq.l    D4, 0x7F
  25. 00000042  7600                     moveq.l    D3, 0x00
  26. 00000044  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  27. 00000048  672E                     beq        +0x30 /* 00000078 */
  28. 0000004A  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  29. 0000004E  0C40 002C                cmpi.w     D0, 0x2C /* ',' */
  30. 00000052  670C                     beq        +0xE /* 00000060 */
  31. 00000054  4EAD 0482                jsr        [A5 + 0x482 /* export_140 */]
  32. 00000058  3800                     move.w     D4, D0
  33. 0000005A  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  34. 0000005E  6718                     beq        +0x1A /* 00000078 */
  35. label00000060:
  36. 00000060  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  37. 00000064  4EAD 0482                jsr        [A5 + 0x482 /* export_140 */]
  38. 00000068  3600                     move.w     D3, D0
  39. 0000006A  4EAD 02DA                jsr        [A5 + 0x2DA /* export_87 */]
  40. 0000006E  B66D FDEA                cmp.w      D3, [A5 - 0x216]
  41. 00000072  6304                     bls        +0x6 /* 00000078 */
  42. label00000074:
  43. 00000074  4EED 0182                jmp        [A5 + 0x182 /* export_44 */]
  44. label00000078:
  45. 00000078  6106                     bsr        +0x8 /* 00000080 */
  46. label0000007A:
  47. 0000007A  536D FE22                subq.w     [A5 - 0x1DE], 1
  48. 0000007E  4E75                     rts
  49. fn00000080:
  50. 00000080  2F08                     move.l     -[A7], A0
  51. 00000082  43ED FDE2                lea.l      A1, [A5 - 0x21E]
  52. 00000086  1431 3000                move.b     D2, [A1 + D3.w]
  53. 0000008A  3F03                     move.w     -[A7], D3
  54. 0000008C  2B45 ECA6                move.l     [A5 - 0x135A], D5
  55. 00000090  262D FEC6                move.l     D3, [A5 - 0x13A]
  56. 00000094  4EAD 01BA                jsr        [A5 + 0x1BA /* export_51 */]
  57. 00000098  4EAD 0032                jsr        [A5 + 0x32 /* export_2 */]
  58. 0000009C  0C43 0100                cmpi.w     D3, 0x100
  59. 000000A0  64D2                     bcc        -0x2C /* 00000074 */
  60. 000000A2  3A03                     move.w     D5, D3
  61. 000000A4  361F                     move.w     D3, [A7]+
  62. 000000A6  4A45                     tst.w      D5
  63. 000000A8  675C                     beq        +0x5E /* 00000106 */
  64. 000000AA  3F03                     move.w     -[A7], D3
  65. 000000AC  6100 00D6                bsr        +0xD8 /* 00000184 */
  66. 000000B0  12FC 0001                move.b     [A1]+, 0x1
  67. 000000B4  12C5                     move.b     [A1]+, D5
  68. 000000B6  12C2                     move.b     [A1]+, D2
  69. 000000B8  2B46 ECA6                move.l     [A5 - 0x135A], D6
  70. 000000BC  1B7C 0004 ECFB           move.b     [A5 - 0x1305], 0x4
  71. 000000C2  4EAD 01A2                jsr        [A5 + 0x1A2 /* export_48 */]
  72. 000000C6  6BAC                     bmi        -0x52 /* 00000074 */
  73. 000000C8  4A6D FDEA                tst.w      [A5 - 0x216]
  74. 000000CC  6620                     bne        +0x22 /* 000000EE */
  75. 000000CE  12C4                     move.b     [A1]+, D4
  76. 000000D0  262D FEBE                move.l     D3, [A5 - 0x142]
  77. 000000D4  4EAD 018A                jsr        [A5 + 0x18A /* export_45 */]
  78. 000000D8  6A04                     bpl        +0x6 /* 000000DE */
  79. 000000DA  7600                     moveq.l    D3, 0x00
  80. 000000DC  600C                     bra        +0xE /* 000000EA */
  81. label000000DE:
  82. 000000DE  262D FECA                move.l     D3, [A5 - 0x136]
  83. 000000E2  4EAD 01C2                jsr        [A5 + 0x1C2 /* export_52 */]
  84. 000000E6  4EAD 0032                jsr        [A5 + 0x32 /* export_2 */]
  85. label000000EA:
  86. 000000EA  32C3                     move.w     [A1]+, D3
  87. 000000EC  6014                     bra        +0x16 /* 00000102 */
  88. label000000EE:
  89. 000000EE  262D FECE                move.l     D3, [A5 - 0x132]
  90. 000000F2  4EAD 01BA                jsr        [A5 + 0x1BA /* export_51 */]
  91. 000000F6  4EAD 003A                jsr        [A5 + 0x3A /* export_3 */]
  92. 000000FA  4843                     swap.w     D3
  93. 000000FC  12C3                     move.b     [A1]+, D3
  94. 000000FE  4843                     swap.w     D3
  95. 00000100  32C3                     move.w     [A1]+, D3
  96. label00000102:
  97. 00000102  361F                     move.w     D3, [A7]+
  98. 00000104  6158                     bsr        +0x5A /* 0000015E */
  99. label00000106:
  100. 00000106  205F                     movea.l    A0, [A7]+
  101. 00000108  4E75                     rts
  102. fn0000010A:
  103. 0000010A  2F08                     move.l     -[A7], A0
  104. 0000010C  4A2D FDF8                tst.b      [A5 - 0x208]
  105. 00000110  6612                     bne        +0x14 /* 00000124 */
  106. 00000112  50ED FDF8                st         [A5 - 0x208]
  107. 00000116  7600                     moveq.l    D3, 0x00
  108. label00000118:
  109. 00000118  6160                     bsr        +0x62 /* 0000017A */
  110. 0000011A  6142                     bsr        +0x44 /* 0000015E */
  111. 0000011C  5243                     addq.w     D3, 1
  112. 0000011E  B66D FDEA                cmp.w      D3, [A5 - 0x216]
  113. 00000122  63F4                     bls        -0xA /* 00000118 */
  114. label00000124:
  115. 00000124  205F                     movea.l    A0, [A7]+
  116. 00000126  4E75                     rts
  117. fn00000128:
  118. 00000128  2F08                     move.l     -[A7], A0
  119. 0000012A  4A2D FDF8                tst.b      [A5 - 0x208]
  120. 0000012E  672A                     beq        +0x2C /* 0000015A */
  121. 00000130  422D FDF8                clr.b      [A5 - 0x208]
  122. 00000134  522D FDF9                addq.b     [A5 - 0x207], 1
  123. 00000138  202D FDEC                move.l     D0, [A5 - 0x214]
  124. 0000013C  5280                     addq.l     D0, 1
  125. 0000013E  661A                     bne        +0x1C /* 0000015A */
  126. 00000140  532D FDF9                subq.b     [A5 - 0x207], 1
  127. 00000144  42AD FDEC                clr.l      [A5 - 0x214]
  128. 00000148  203C 0001 0001           move.l     D0, 0x10001
  129. 0000014E  2B40 FDDA                move.l     [A5 - 0x226], D0
  130. 00000152  2B40 FDDE                move.l     [A5 - 0x222], D0
  131. 00000156  4EAD 0982                jsr        [A5 + 0x982 /* export_300 */]
  132. label0000015A:
  133. 0000015A  205F                     movea.l    A0, [A7]+
  134. 0000015C  4E75                     rts
  135. fn0000015E:
  136. 0000015E  610C                     bsr        +0xE /* 0000016C */
  137. 00000160  6608                     bne        +0xA /* 0000016A */
  138. 00000162  30BC 0001                move.w     [A0], 0x1
  139. 00000166  4EAD 0982                jsr        [A5 + 0x982 /* export_300 */]
  140. label0000016A:
  141. 0000016A  4E75                     rts
  142. fn0000016C:
  143. 0000016C  3003                     move.w     D0, D3
  144. 0000016E  D040                     add.w      D0, D0
  145. 00000170  41ED FDDA                lea.l      A0, [A5 - 0x226]
  146. 00000174  D0C0                     add.w      A0, D0
  147. 00000176  3010                     move.w     D0, [A0]
  148. 00000178  4E75                     rts
  149. fn0000017A:
  150. 0000017A  6108                     bsr        +0xA /* 00000184 */
  151. 0000017C  4259                     clr.w      [A1]+
  152. 0000017E  4259                     clr.w      [A1]+
  153. 00000180  4259                     clr.w      [A1]+
  154. 00000182  4E75                     rts
  155. fn00000184:
  156. 00000184  48E7 E880                movem.l    -[A7], D0,D1,D2,D4,A0
  157. label00000188:
  158. 00000188  4EAD 0AFA                jsr        [A5 + 0xAFA /* export_347 */]
  159. 0000018C  3828 0000                move.w     D4, [A0 + 0x0]
  160. 00000190  D2C4                     add.w      A1, D4
  161. 00000192  5C44                     addq.w     D4, 6
  162. 00000194  B868 0006                cmp.w      D4, [A0 + 0x6]
  163. 00000198  6504                     bcs        +0x6 /* 0000019E */
  164. 0000019A  3828 0004                move.w     D4, [A0 + 0x4]
  165. label0000019E:
  166. 0000019E  B868 0002                cmp.w      D4, [A0 + 0x2]
  167. 000001A2  6616                     bne        +0x18 /* 000001BA */
  168. 000001A4  4EAD 0232                jsr        [A5 + 0x232 /* export_66 */]
  169. 000001A8  202D FDEC                move.l     D0, [A5 - 0x214]
  170. 000001AC  5280                     addq.l     D0, 1
  171. 000001AE  66D8                     bne        -0x26 /* 00000188 */
  172. 000001B0  B868 0002                cmp.w      D4, [A0 + 0x2]
  173. 000001B4  6604                     bne        +0x6 /* 000001BA */
  174. label000001B6:
  175. 000001B6  4EED 040A                jmp        [A5 + 0x40A /* export_125 */]
  176. label000001BA:
  177. 000001BA  3144 0000                move.w     [A0 + 0x0], D4
  178. 000001BE  4CDF 0117                movem.l    D0,D1,D2,D4,A0, [A7]+
  179. 000001C2  4E75                     rts
  180. export_441:
  181. 000001C4  526D FE22                addq.w     [A5 - 0x1DE], 1
  182. 000001C8  4EAD 0482                jsr        [A5 + 0x482 /* export_140 */]
  183. 000001CC  3600                     move.w     D3, D0
  184. 000001CE  0C03 0004                cmpi.b     D3, 0x4
  185. 000001D2  6400 FEA0                bcc        -0x15E /* 00000074 */
  186. 000001D6  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  187. 000001DA  6604                     bne        +0x6 /* 000001E0 */
  188. 000001DC  6156                     bsr        +0x58 /* 00000234 */
  189. 000001DE  604E                     bra        +0x50 /* 0000022E */
  190. label000001E0:
  191. 000001E0  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  192. 000001E4  4244                     clr.w      D4
  193. 000001E6  0C40 002C                cmpi.w     D0, 0x2C /* ',' */
  194. 000001EA  672A                     beq        +0x2C /* 00000216 */
  195. 000001EC  7801                     moveq.l    D4, 0x01
  196. 000001EE  0C40 00B5                cmpi.w     D0, 0xB5
  197. 000001F2  6608                     bne        +0xA /* 000001FC */
  198. 000001F4  7802                     moveq.l    D4, 0x02
  199. 000001F6  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  200. 000001FA  601A                     bra        +0x1C /* 00000216 */
  201. label000001FC:
  202. 000001FC  4EAD 072A                jsr        [A5 + 0x72A /* export_225 */]
  203. 00000200  0C82 0000 0200           cmpi.l     D2, 0x200
  204. 00000206  6500 FE6C                bcs        -0x192 /* 00000074 */
  205. 0000020A  0C2D 0002 ECFB           cmpi.b     [A5 - 0x1305], 0x2
  206. 00000210  6704                     beq        +0x6 /* 00000216 */
  207. 00000212  4EED 01F2                jmp        [A5 + 0x1F2 /* export_58 */]
  208. label00000216:
  209. 00000216  7400                     moveq.l    D2, 0x00
  210. 00000218  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  211. 0000021C  670E                     beq        +0x10 /* 0000022C */
  212. 0000021E  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  213. 00000222  4EAD 0482                jsr        [A5 + 0x482 /* export_140 */]
  214. 00000226  3400                     move.w     D2, D0
  215. 00000228  4EAD 02DA                jsr        [A5 + 0x2DA /* export_87 */]
  216. label0000022C:
  217. 0000022C  611C                     bsr        +0x1E /* 0000024A */
  218. label0000022E:
  219. 0000022E  536D FE22                subq.w     [A5 - 0x1DE], 1
  220. 00000232  4E75                     rts
  221. fn00000234:
  222. 00000234  4A03                     tst.b      D3
  223. 00000236  6600 FE3C                bne        -0x1C2 /* 00000074 */
  224. 0000023A  4A6D FDEA                tst.w      [A5 - 0x216]
  225. 0000023E  6708                     beq        +0xA /* 00000248 */
  226. 00000240  426D FDEA                clr.w      [A5 - 0x216]
  227. 00000244  4EAD 07DA                jsr        [A5 + 0x7DA /* export_247 */]
  228. label00000248:
  229. 00000248  4E75                     rts
  230. fn0000024A:
  231. 0000024A  2F08                     move.l     -[A7], A0
  232. 0000024C  3A02                     move.w     D5, D2
  233. 0000024E  4AAD FDF4                tst.l      [A5 - 0x20C]
  234. 00000252  6620                     bne        +0x22 /* 00000274 */
  235. 00000254  203C 0000 0400           move.l     D0, 0x400
  236. 0000025A  A122                     syscall    NewHandle, flags=1
  237. 0000025C  6600 FF58                bne        -0xA6 /* 000001B6 */
  238. 00000260  2B48 FDF4                move.l     [A5 - 0x20C], A0
  239. 00000264  2250                     movea.l    A1, [A0]
  240. 00000266  303C 00FF                move.w     D0, 0xFF
  241. label0000026A:
  242. 0000026A  4299                     clr.l      [A1]+
  243. 0000026C  51C8 FFFC                dbf        D0, -0x6 /* 0000026A */
  244. 00000270  4EAD 098A                jsr        [A5 + 0x98A /* export_301 */]
  245. label00000274:
  246. 00000274  41ED FDE2                lea.l      A0, [A5 - 0x21E]
  247. 00000278  1185 3000                move.b     [A0 + D3.w], D5
  248. 0000027C  4A04                     tst.b      D4
  249. 0000027E  6702                     beq        +0x4 /* 00000282 */
  250. 00000280  6114                     bsr        +0x16 /* 00000296 */
  251. label00000282:
  252. 00000282  4A6D FDEA                tst.w      [A5 - 0x216]
  253. 00000286  660A                     bne        +0xC /* 00000292 */
  254. 00000288  3B7C 0003 FDEA           move.w     [A5 - 0x216], 0x3
  255. 0000028E  4EAD 07DA                jsr        [A5 + 0x7DA /* export_247 */]
  256. label00000292:
  257. 00000292  205F                     movea.l    A0, [A7]+
  258. 00000294  4E75                     rts
  259. fn00000296:
  260. 00000296  3003                     move.w     D0, D3
  261. 00000298  E540                     asl        D0.w, 2
  262. 0000029A  41ED FD88                lea.l      A0, [A5 - 0x278]
  263. 0000029E  2070 0022                movea.l    A0, [A0 + D0.w + 0x22]
  264. 000002A2  323C 00FF                move.w     D1, 0xFF
  265. 000002A6  5304                     subq.b     D4, 1
  266. 000002A8  670C                     beq        +0xE /* 000002B6 */
  267. 000002AA  45FA 0020                lea.l      A2, [PC + 0x20 /* 000002CC, value 0x7F828588 */]
  268. label000002AE:
  269. 000002AE  10DA                     move.b     [A0]+, [A2]+
  270. 000002B0  51C9 FFFC                dbf        D1, -0x6 /* 000002AE */
  271. 000002B4  6014                     bra        +0x16 /* 000002CA */
  272. label000002B6:
  273. 000002B6  301A                     move.w     D0, [A2]+
  274. 000002B8  0640 0080                addi.w     D0, 0x80
  275. 000002BC  0C40 0100                cmpi.w     D0, 0x100
  276. 000002C0  6400 FDB2                bcc        -0x24C /* 00000074 */
  277. 000002C4  10C0                     move.b     [A0]+, D0
  278. 000002C6  51C9 FFEE                dbf        D1, -0x14 /* 000002B6 */
  279. label000002CA:
  280. 000002CA  4E75                     rts
  281. 000002CC  7F82                     moveq.l    D7, 0xFFFFFF82
  282. 000002CE  8588 8B8F                unpk       -[A2], -[A0], 0x8B8F
  283. 000002D2  9295                     sub.l      D1, [A5]
  284. 000002D4  989B                     sub.l      D4, [A3]+
  285. 000002D6  9EA1                     sub.l      D7, -[A1]
  286. 000002D8  A4A7                     syscall    vStdExit, flags=4
  287. 000002DA  AAAD                     syscall    0xAAD
  288. 000002DC  B0B3 B6B8                cmp.l      D0, [A3 + A3.w * 8 - 0x72]
  289. 000002E0  BBBE                     xor.l      <<invalid special address>>, D5
  290. 000002E2  C1C3                     muls.w     D0, D3
  291. 000002E4  C6C8                     mulu.w     D3, A0
  292. 000002E6  CBCD                     muls.w     D5, A5
  293. 000002E8  D0D2                     add.w      A0, [A2]
  294. 000002EA  D5D7                     add.l      A2, [A7]
  295. 000002EC  D9DB                     add.l      A4, [A3]+
  296. 000002EE  DDE0                     add.l      A6, -[A0]
  297. 000002F0  E2E4                     lsr   .w   -[A4]
  298. 000002F2  E5E7                     roxl  .w   -[A7]
  299. 000002F4  E9EB ECEE EFF1           bfextu     D6, [A3 - 0x100F] {D3:D6}
  300. 000002FA  F2F4 F5F6                .extension 0x2F4 <<F/2-3/1>> // unimplemented
  301. 000002FE  F7F8                     .invalid   <<F/7/3>>
  302. 00000300  F9FA                     .invalid   <<F/7/4>>
  303. 00000302  FBFB                     .invalid   <<F/7/5>>
  304. 00000304  FCFD FDFE                .extension 0xCFD <<F/2-3/6>> // unimplemented
  305. 00000308  FEFE FEFE                .extension 0xEFE <<F/2-3/7>> // unimplemented
  306. 0000030C  FFFE                     .invalid   <<F/7/7>>
  307. 0000030E  FEFE FEFE                .extension 0xEFE <<F/2-3/7>> // unimplemented
  308. 00000312  FDFD                     .invalid   <<F/7/6>>
  309. 00000314  FCFB FBFA                .extension 0xCFB <<F/2-3/6>> // unimplemented
  310. 00000318  F9F8                     .invalid   <<F/7/4>>
  311. 0000031A  F7F6                     .invalid   <<F/7/3>>
  312. 0000031C  F5F4                     .invalid   <<F/7/2>>
  313. 0000031E  F2F1 EFEE                .extension 0x2F1 <<F/2-3/1>> // unimplemented
  314. 00000322  ECEB E9E7 E5E4           bfclr      [A3 - 0x1A1C] {D7:D7}
  315. 00000328  E2E0                     lsr   .w   -[A0]
  316. 0000032A  DDDB                     add.l      A6, [A3]+
  317. 0000032C  D9D7                     add.l      A4, [A7]
  318. 0000032E  D5D2                     add.l      A2, [A2]
  319. 00000330  D0CD                     add.w      A0, A5
  320. 00000332  CBC8                     muls.w     D5, A0
  321. 00000334  C6C3                     mulu.w     D3, D3
  322. 00000336  C1BE                     and.l      <<invalid special address>>, D0
  323. 00000338  BBB8 B6B3                xor.l      [0xFFFFB6B3], D5
  324. 0000033C  B0AD AAA7                cmp.l      D0, [A5 - 0x5559]
  325. 00000340  A4A1                     syscall    vMRdData, flags=4
  326. 00000342  9E9B                     sub.l      D7, [A3]+
  327. 00000344  9895                     sub.l      D4, [A5]
  328. 00000346  928F                     sub.l      D1, A7
  329. 00000348  8B88 8582                unpk       -[A5], -[A0], 0x8582
  330. 0000034C  7F7C                     moveq.l    D7, 0x7C
  331. 0000034E  7976                     moveq.l    D4, 0x76
  332. 00000350  736F                     moveq.l    D1, 0x6F
  333. 00000352  6C69                     bge        +0x6B /* 000003BD */
  334. 00000354  6663                     bne        +0x65 /* 000003B9 */
  335. 00000356  605D                     bra        +0x5F /* 000003B5 */
  336. 00000358  5A57                     addq.w     [A7], 5
  337. 0000035A  5451                     addq.w     [A1], 2
  338. 0000035C  4E4B                     trap       11
  339. 0000035E  4846                     swap.w     D6
  340. 00000360  4340                     chk.w      D1, D0
  341. 00000362  3D3B 3836                move.w     -[A6], [PC + D3 + 0x36]
  342. 00000366  3331 2E2C                move.w     -[A1], [A1 + D2 * 8 + 0x2C]
  343. 0000036A  2927                     move.l     -[A4], -[A7]
  344. 0000036C  2523                     move.l     -[A2], -[A3]
  345. 0000036E  211E                     move.l     -[A0], [A6]+
  346. 00000370  1C1A                     move.b     D6, [A2]+
  347. 00000372  1917                     move.b     -[A4], [A7]
  348. 00000374  1513                     move.b     -[A2], [A3]
  349. 00000376  1210                     move.b     D1, [A0]
  350. 00000378  0F0D                     btst       A5, D7
  351. 0000037A  0C0A 0908                cmpi.b     A2, 0x8
  352. 0000037E  0706                     btst       D6, D3
  353. 00000380  0504                     btst       D4, D2
  354. 00000382  0303                     btst       D3, D1
  355. 00000384  0201 0100                andi.b     D1, 0x0
  356. 00000388  0000 0000                ori.b      D0, 0x0
  357. 0000038C  0000 0000                ori.b      D0, 0x0
  358. 00000390  0000 0101                ori.b      D0, 0x1
  359. 00000394  0203 0304                andi.b     D3, 0x4
  360. 00000398  0506                     btst       D6, D2
  361. 0000039A  0708                     btst       A0, D3
  362. 0000039C  090A                     btst       A2, D4
  363. 0000039E  0C0D 0F10                cmpi.b     A5, 0x10
  364. 000003A2  1213                     move.b     D1, [A3]
  365. 000003A4  1517                     move.b     -[A2], [A7]
  366. 000003A6  191A                     move.b     -[A4], [A2]+
  367. 000003A8  1C1E                     move.b     D6, [A6]+
  368. 000003AA  2123                     move.l     -[A0], -[A3]
  369. 000003AC  2527                     move.l     -[A2], -[A7]
  370. 000003AE  292C 2E31                move.l     -[A4], [A4 + 0x2E31]
  371. 000003B2  3336 383B                move.w     -[A1], [A6 + D3 + 0x3B]
  372. 000003B6  3D40 4346                move.w     [A6 + 0x4346], D0
  373. 000003BA  484B                     pea.l      A3
  374. 000003BC  4E51 5457                link       A1, -0xFFFFABA9
  375. 000003C0  5A5D                     addq.w     [A5]+, 5
  376. 000003C2  6063                     bra        +0x65 /* 00000427 */
  377. 000003C4  6669                     bne        +0x6B /* 0000042F */
  378. 000003C6  6C6F                     bge        +0x71 /* 00000437 */
  379. 000003C8  7376                     moveq.l    D1, 0x76
  380. 000003CA  797C                     moveq.l    D4, 0x7C
  381.